10 READ R,C
20 FOR I = 1 TO R
30    FOR J = 1 TO C
40       READ T(I,J)
50    NEXT J
60 NEXT I
70 FOR I = 1 TO R
80    LET S = 0
90    FOR J = 1 TO C
100      LET S = S + T(I,J)
110   NEXT J
120 PRINT "SUM OF ROW" I;"EQUALS" S
130 NEXT I
140 PRINT
150 FOR J = 1 TO C
160    LET S = 0
170    FOR I = 1 TO R
180       LET S = S + T(I,J)
190    NEXT I
200    PRINT "SUM OF COLUMN" J; "EQUALS" S
210 NEXT J
220 DATA 3,5
230 DATA 1,2,3,4,5
240 DATA 5,4,3,2,1
250 DATA 2,0,5,2,1
260 END
                                                                                                                                     